// TOWN SPECIAL ENCOUNTERS
//    Town 0: Krizsan

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	set_personality_name(1,"Mayor Arbuckle");
	set_personality_name(2,"Captain Maxine");
	set_personality_name(3,"Cindy");
	set_personality_name(4,"Fellows");
	set_personality_name(5,"McElroy");

	set_personality_name(6,"Dawn");
	set_personality_name(7,"Gypsy");
	set_personality_name(8,"Escovedo");
	set_personality_name(9,"Ellis");
	set_personality_name(10,"Terry");


	set_personality_name(22,"Herron");
	set_personality_name(11,"Jinx");
	set_personality_name(12,"Jinx");
	set_personality_name(13,"Benedict");
	set_personality_name(14,"Kessle");
	set_personality_name(15,"Denzil");


	set_personality_name(16,"Strange Wizard");
	set_personality_name(17,"Gardner");
	set_personality_name(18,"Captain Agrod");
	set_personality_name(19,"Valoda");
	set_personality_name(20,"Falko");
	set_personality_name(21,"Vlad");

	set_crime_tolerance(max_crime);

		if (revive_party()) {
			print_str_color("Entering a friendly major city heals your wounds",2);
			print_str_color("  and restores your spell energy.",2);
			}
	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(7,"I've heard rumors.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(7,"Ah. It's you.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(7,"I can deal with you.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(8,"Hello, visitor.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(8,"Another long patrol.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(9,"Quiet, little slime.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(9,"What is the secret?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(9,"Don't touch my equipment.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(10,"I see the future!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(10,"I pass beyond the veil!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(10,"I see all secrets.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12,"I sailed the seas.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12,"Bored. So bored.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12,"Another ale.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(35,"We have pallets for rent.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(35,"We have edible beer.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(35,"Have a seat, warrior.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12,"Have a seat.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12,"More ale, inkeep.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(51,"Hello, fellow cave dweller.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(51,"(Strum.)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(51,"(Strum, strum.)");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(51,"We should talk.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(22,"Pfaugh!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(22,"Stupid monsters.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(22,"Waste of my life.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(16,"I'm on patrol.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(16,"Hello, fellow warrior.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(43,"You seem in good health.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(43,"Please rest.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(18,"You could use good food.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(18,"Fine provisions!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(18,"Fresh baked bread.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(18,"Fine, organic meat goods.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(18,"All food slime-free.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(19,"Clang! Clang!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(19,"Fine blades for sale.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(19,"I buy used goods.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(52,"All alone.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(52,"All is lost.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(52,"We are doomed.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(52,"We had hope.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(52,"We were fools.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(20,"I sell armor.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(20,"I can buy things.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(11,"We deal in quality.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(11,"We have fine rooms.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(11,"Our ale is first rate.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(11,"Valorim's finest wine?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(15,"Bad days.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(15,"I've heard rumors.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(15,"They walk among us.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(15,"The exiles return.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(45,"I collect rare knowledge.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(45,"I can inform you.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(45,"Many are my secrets.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(46,"I move from town to town.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(46,"Other towns are worse.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(46,"So many need healing.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(24,"I keep hearing them.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(24,"I report to the Empire.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(24,"This city is so humble.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(32,"There are two job boards.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(32,"The board here is refreshed often.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(32,"The board outside is for adventurers.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(32,"Don't be late with deliveries.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(17,"Stay low.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(17,"The slimes can spit fire.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(53,"I sell lights!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(53,"I can brighten your way.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(53,"I move from town to town!");

	if (gf(307,3) == 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(7,"We need help.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(7,"The slimes are destroying us.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"Watch out for goos.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9,"Need more specimens.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9,"I have a new plan!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(35,"The goos are ruining me.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12,"Still trapped here.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(16,"There's one!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(16,"(Shoots!)");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(43,"So many to heal.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(43,"The slimes are everywhere.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(20,"Armor is needed. So many slimes.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(20,"I can't study yet.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(11,"The slimes are terrible.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(46,"I'm still needed here.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(24,"Not even safe here.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(24,"They won't send help.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(17,"We're doomed.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(17,"I've seen three today.");

		}
	if (gf(307,3) > 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(7,"You saved us.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(7,"We will not forget what you did.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"It's much better now.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9,"My specimens are rare.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9,"No more slimes to study.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(35,"It's all nicer now.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12,"Soon, the ships will sail.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(22,"At least the slimes are gone.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(16,"Much better now.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(16,"No more slimes.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(43,"Fewer to heal now.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(20,"The slimes are gone!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(20,"I can return to my studies.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(11,"No more slimes, at last!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(46,"I'll be going soon.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(46,"Maybe Sharimik next.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(24,"I solved the problem!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(17,"I may actually live.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(17,"Haven't seen a slime for days.");
		if (get_ran(1,0,100) < 15)
			give_char_text_bubble(12,"It's the hero of Valorim!");

		}
break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

